home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Animacje, filmy i prezentacje / Modelowanie 3D / K-3D 0.6.5.0 / k3d-all-in-one-setup-0.6.5.0.exe / k3d-setup-0.6.5.0.exe / share / lsystem / abop-bush.ls < prev    next >
Encoding:
Text File  |  2005-02-12  |  246 b   |  13 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 7       # recursion depth
  3. 22.5    # angle
  4. 80      # thickness as % of length
  5. #
  6. c(12)A
  7. #
  8. A=[&FL!A]>>>>>[&FL!A]>>>>>>>[&FL!A]
  9. F=S>>>>>F
  10. S=FL
  11. L=[c(8)^^{-f+f+f-|-f+f+f}]
  12. @
  13.